(remove, remq): Remove.
authorDave Love <fx@gnu.org>
Fri, 5 Jan 2001 16:39:40 +0000 (16:39 +0000)
committerDave Love <fx@gnu.org>
Fri, 5 Jan 2001 16:39:40 +0000 (16:39 +0000)
lisp/emacs-lisp/cl-seq.el

index 90fba3cfe3ab2a87b49d04289e1bded84e183890..bea91dc309895618ff68c711329af0f372ec1594 100644 (file)
@@ -322,9 +322,6 @@ This is a destructive function; it reuses the storage of SEQ whenever possible.
 Keywords supported:  :key :count :start :end :from-end"
   (apply 'delete* nil cl-list :if-not cl-pred cl-keys))
 
-(defun remove (x y) (remove* x y :test 'equal))
-(defun remq (x y) (if (memq x y) (delq x (copy-list y)) y))
-
 (defun remove-duplicates (cl-seq &rest cl-keys)
   "Return a copy of SEQ with all duplicate elements removed.
 Keywords supported:  :test :test-not :key :start :end :from-end"